home *** CD-ROM | disk | FTP | other *** search
/ Aminet 23 / Aminet 23 (1998)(GTI - Schatztruhe)[!][Feb 1998].iso / Aminet / util / boot / AStart33.lha / AStart / Install.script < prev    next >
Text File  |  1997-12-06  |  7KB  |  258 lines
  1. ; $VER: Install script for AStart21 2.7 (27.10.97)
  2. ; LANGUAGES
  3.  
  4. (procedure polish (
  5.     (set language0 "Polski")
  6.     (set MSG_WELCOME "\nWitaj w AStart V2.1\n\nostatecznym programie do\n\nbootowania \"alternatywnego\"\n\nAStart © 1997 Wojiech Kocjan\n\nAStart jest mailware\n\n(nowy uûytkownik/czka)")
  7.     (set MSG_WELCOMEU "\nWitaj w AStart V2.1\n\nostatecznym programie do\n\nbootowania \"alternatywnego\"\n\nAStart © 1997 Wojiech Kocjan\n\nAStart jest mailware\n\n(upgrade ze starszej wersji)")
  8.     (set MSG_ASKPREFDIR "Podaj ôcieûkë docelowâ dla programu konfiguracji")
  9.     (set MSG_COPYCMD "Kopiowanie komendy uruchamiajâcej AStart")
  10.     (set MSG_COPYASTARTUP "Kopiowanie skryptu alternate-startup")
  11.     (set MSG_ASK_YES "Tak")
  12.     (set MSG_ASK_NO "Nie")
  13.     (set MSG_ASKMODIFY "Czy mam modyfikowaê plik s:startup-sequence?\n(jest to konieczne, jeûeli nie zainstalowaîeô(aô)\njeszcze poprzednich wersji AStart,\nJeûeli tak, to nie jest to zalecane)")
  14.     (set MSG_ASKMODIFY_YES "Modyfikuj")
  15.     (set MSG_ASKMODIFY_NO "Nie modyfikuj")
  16.     (set MSG_ASKBACKUP "Czy mam zrobiê kopië oryginalnego pliku s:startup-sequence?")
  17.     (set MSG_ASKBACKUP_YES "Zrób kopië")
  18.     (set MSG_ASKBACKUP_NO "Nie rób kopii")
  19.     (set MSG_MODIFYSTARTUP0 "Modyfikowanie pliku startup-sequence")
  20.     (set MSG_COPYSTARTUP "Kopiowanie zmodyfikowanego pliku startup-sequence")
  21.     (set MSG_RUNPREF "Czy mam uruchomiê program ustawieï? (wymaga MUI 3.1)")
  22.     (set MSG_ASK_COPYDOC "Czy mam skopiowaê plik pomocy?")
  23.     (set MSG_COPYDOC "Kopiujë plik pomocy...")
  24.     (set MSG_ASKDOCSDIR "Gdzie mam umieôciê plik pomocy?")
  25.     (set MSG_COPYENVARC "Kopiujë podstawowe ustawienia...")
  26.     (set MSG_INSTALLGFI "Instalujë GoForIt...")
  27.     (set MSG_COPYLIBRARY "Kopiujë bibliotekë astart.library")
  28. ))
  29.  
  30. (procedure english (
  31.     (set language0 "English")
  32.     (set MSG_WELCOME "\nWelcome to AStart V2.1\n\nthe ultimate alternate bootup maker\n\nAStart © 1997 Wojciech Kocjan\n\nAStart is mailware\n\n(you are a new AStart user)")
  33.     (set MSG_WELCOMEU "\nWelcome to AStart V2.1\n\nthe ultimate alternate bootup maker\n\nAStart © 1997 Wojciech Kocjan\n\nAStart is mailware\n\n(you are upgrading from older versions of AStart)")
  34.     (set MSG_ASKPREFDIR "Enter path for preferences")
  35.     (set MSG_COPYCMD "Copying AStart running command")
  36.     (set MSG_COPYASTARTUP "Copying alternate-startup script")
  37.     (set MSG_ASK_YES "Yes")
  38.     (set MSG_ASK_NO "No")
  39.     (set MSG_ASKMODIFY "Should I modify s:startup-sequence?\n(it's neccessary if you haven't installed\nAStart yet, if you already have, then it's not reccommended)")
  40.     (set MSG_ASKMODIFY_YES "Modify")
  41.     (set MSG_ASKMODIFY_NO "Don't modify")
  42.     (set MSG_ASKBACKUP "Should I backup the original s:startup-sequence?")
  43.     (set MSG_ASKBACKUP_YES "Backup")
  44.     (set MSG_ASKBACKUP_NO "Don't backup")
  45.     (set MSG_MODIFYSTARTUP0 "Modyfying s:startup-sequence")
  46.     (set MSG_COPYSTARTUP "Copying modified startup-sequence")
  47.     (set MSG_RUNPREF "Shall I run the preferences program? (requires MUI 3.1)")
  48.     (set MSG_ASK_COPYDOC "Shall I copy the docs?")
  49.     (set MSG_COPYDOC "Copying the docs...")
  50.     (set MSG_ASKDOCSDIR "Where shall I copy the docs?")
  51.     (set MSG_COPYENVARC "Copying default settings...")
  52.     (set MSG_INSTALLGFI "Installing GoForIt...")
  53.     (set MSG_COPYLIBRARY "Copying astart.library")
  54. ))
  55.  
  56. (set language0 "")
  57.  
  58. (if (= @language "english")  (english))
  59. (if (= @language "polski")  (polish))
  60. (if (= language0 "") (english))
  61.  
  62. (procedure modifystartup (
  63.     (textfile (dest "T:startup-sequence")
  64.     (append ("; This part was added by AStart\n; AStart © 1997 Wojciech Kocjan\n\nC:AStart S:alternate-startup\nIF WARN\n  EndCLI >NIL:\nEndIF\n\n" firstline)) (include "s:startup-sequence"))
  65.     (copyfiles
  66.         (prompt MSG_COPYSTARTUP)
  67.         (help @copyfiles-help)
  68.         (source "T:startup-sequence")
  69.         (dest "S:")
  70.         (files)
  71.         (confirm)
  72.     )    
  73. ))
  74.  
  75. (welcome)
  76.  
  77. (run "setenv ASTART_WASINSTALLED `c/MatchLine s:startup-sequence 1 \"(;?This part?was?added?by?AStart|#?AStart#?alternate-startup)\"`" (safe))
  78. (set upgrading (getenv "ASTART_WASINSTALLED"))
  79. (delete "ENV:ASTART_WASINSTALLED" (prompt "") (help "") (optional force) (safe))
  80.  
  81. (if (= upgrading 0)
  82.     (message MSG_WELCOME)
  83.     (message MSG_WELCOMEU)
  84. )
  85.  
  86. (complete 0)
  87.  
  88. (set dest_dir "C:")
  89. (set @default-dest "SYS:")
  90.  
  91. (set pref_dest_dir
  92.    (askdir (prompt MSG_ASKPREFDIR)
  93.            (help @askdir-help)
  94.            (default "SYS:Prefs"))
  95. )
  96.  
  97. (if (= upgrading 0)
  98.     (
  99.         (set backup
  100.             (askbool 
  101.                 (prompt MSG_ASKBACKUP)
  102.                 (help @askbool-help)
  103.                 (default 1)
  104.                 (choices MSG_ASKBACKUP_YES MSG_ASKBACKUP_NO))
  105.         )
  106.         
  107.         (set modify
  108.             (askbool 
  109.                 (prompt MSG_ASKMODIFY)
  110.                 (help @askbool-help)
  111.                 (default 1)
  112.                 (choices MSG_ASKMODIFY_YES MSG_ASKMODIFY_NO))
  113.         )
  114.     )
  115.     (
  116.         (set backup 0)
  117.         (set modify 0)
  118.     )
  119. )
  120.         
  121. (complete 10)
  122.  
  123. (set copydocs
  124.     (askbool
  125.         (prompt MSG_ASK_COPYDOC)
  126.         (help @askbool-help)
  127.         (default 1)
  128.         (choices MSG_ASK_YES MSG_ASK_NO))
  129. )
  130.  
  131. (if (= copydocs 1)
  132.     (set docs_dest_dir
  133.        (askdir (prompt MSG_ASKDOCSDIR)
  134.                (help @askdir-help)
  135.                (default "HELP:"))
  136.     )
  137. )
  138.  
  139. (complete 20)
  140.  
  141. (copyfiles
  142.     (prompt MSG_COPYCMD)
  143.     (help @copyfiles-help)
  144.     (source "C")
  145.     (dest dest_dir)
  146.     (choices "AStart" "Beep" "ConvertX" "GetF" "SetAltMode")
  147.     (confirm)
  148.     (files)
  149. )
  150.  
  151. (complete 30)
  152.  
  153. (copylib
  154.     (prompt MSG_COPYLIBRARY)
  155.     (help @copylib-help)
  156.     (source "libs/astart.library")
  157.     (dest "LIBS:")
  158.     (confirm)
  159. )
  160.  
  161. (if (= copydocs 1)
  162.     (copyfiles
  163.         (prompt MSG_COPYASTARTUP)
  164.         (help @copyfiles-help)
  165.         (source "S/alternate-startup")
  166.         (dest "S:")
  167.         (confirm)
  168.         (files))
  169. )
  170.  
  171. (complete 40)
  172.  
  173. (if (= copydocs 1)
  174.     (
  175.     (copyfiles
  176.         (prompt MSG_COPYDOC)
  177.         (help @copyfiles-help)
  178.         (source "astart.guide")
  179.         (dest docs_dest_dir)
  180.         (infos)
  181.         )
  182.     )
  183. )
  184.  
  185. (complete 50)
  186.  
  187. (if backup
  188.     (copyfiles
  189.         (prompt MSG_COPYCMD)
  190.         (help @copyfiles-help)
  191.         (source "S:startup-sequence")
  192.         (dest "Sys:Storage")
  193.         (newname "startup-sequence.bak")
  194.     )
  195. )
  196.  
  197. (complete 60)
  198.  
  199. (if modify 
  200.     (modifystartup)
  201. )
  202.  
  203. (run "C/CopyPref ENVArc ENVArc: \"AStart_DT\" \"AStart_CIA\" \"AStart_Debug\" \"AStart_DOSDrivers\" \"AStart_ENVArc\" \"AStart_UserStartup\" \"AStart_T\" \"AStart_Monitors\" MODE=0")
  204.  
  205. (complete 70)
  206.  
  207. (copyfiles
  208.     (prompt MSG_COPYCMD)
  209.     (help @copyfiles-help)
  210.     (source "Prefs")
  211.     (dest pref_dest_dir)
  212.     (choices "AStart")
  213.     (confirm)
  214.     (infos)
  215.     (files)
  216. )
  217.  
  218. (complete 80)
  219.  
  220. (makedir "SYS:WBStartup/WBStartup (Enabled)"
  221.     (help @makedir-help)
  222.     )
  223.  
  224. (makedir "SYS:WBStartup/WBStartup (Disabled)"
  225.     (help @makedir-help)
  226.     )
  227.  
  228.  
  229. (run "List >T:ASTART_RENAME_TEMP_FILE SYS:WBStartup/~(GoForIt|#?.info) FILES LFORMAT=\"Rename QUIET *\"%s%s(|.info)*\" *\"SYS:WBStartup/WBStartup (Enabled)*\"\"")
  230.  
  231. (complete 90)
  232.  
  233. (run "Execute <>NIL: T:ASTART_RENAME_TEMP_FILE")
  234.  
  235. (copyfiles
  236.     (prompt MSG_INSTALLGFI)
  237.     (help @copyfiles-help)
  238.     (source "WBStartup")
  239.     (dest "SYS:WBStartup")
  240.     (confirm)
  241.     (all)
  242. )
  243.  
  244. (complete 95)
  245.  
  246. (if
  247.     (askbool 
  248.         (prompt MSG_RUNPREF)
  249.         (help @askbool-help)
  250.         (default 1)
  251.         (choices MSG_ASK_YES MSG_ASK_NO))
  252.     (run "Prefs/AStart")
  253. )
  254.  
  255. (complete 100)
  256.  
  257. (exit)
  258.